Skocz do zawartości

  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • ✅ Pełny dostęp do działów i ukrytych treści
    • ✅ Możliwość pisania i odpowiadania w tematach
    • ✅ System prywatnych wiadomości
    • ✅ Zbieranie reputacji i rozwijanie swojego profilu
    • ✅ Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

[Quest] Loteria Szczescia

Shojacz

Rekomendowane odpowiedzi

Shojacz Pomocnik

Shojacz

Opublikowano
Pomocnik

Shojacz

Opublikowano

Witam,

przedstawię wam mojego questa na Loterie Szczescia :

 

 

Treść Questa :

 

quest lotek begin

state start begin

when 9003.chat."Losowanie Szczescia" begin

if get_time() >= pc.getqf("tajm") then

say_title("Witaj " .. pc . name .. "")

say("[ENTER]Czy chcesz zagrać z innymi w Losowanie Szczescia ?[ENTER]")

local s=select("Tak", "Nie")

if s==1 then

say_title("Kobita od Losowania :")

say("[ENTER]Aby zagrać w Bardzo duże losowanie o Tryliony ,[ENTER]trzeba wpłacić troszke pieniedzy .")

say("Losawanie będzie co dwie godziny.")

say("Musisz osiągnąć minimum 80 level .")

say("Aby cos wygrać trzeba wziaść udział .")

say("Wygrać można olbrzymią ilość Yang i jakies drobne prezenty.")

say("[ENTER]Czy chczesz wziąć udział w losowaniu ?[ENTER]")

local s=select("Tak", "Boje sie ")

if s==1 then

if pc.money<2000000 then

say_title("Kobita od Losowania :")

say("[ENTER]Nie masz 20000000 Yang.[ENTER]")

else

pc.setqf("juz", 1)

pc.changemoney(-2000000)

say_title("Kobita od Losowania :")

say("[ENTER]A więc tak ,[ENTER]Kliknij na mnie a bedziesz bral udzial.[ENTER]")

wait()

say_title("Wpisz")

say("[ENTER]Liczbe numer 1 :[ENTER]")

local jeden = tonumber(input(""))

say_title("Wpisz")

say("[ENTER]Liczbe numer 2 :[ENTER]")

local dwa = tonumber(input(""))

say_title("Wpisz")

say("[ENTER]Liczbe numer 3 :[ENTER]")

local trzy = tonumber(input(""))

say_title("Wpisz")

say("[ENTER]Liczbe numer 4 :[ENTER]")

local cztery = tonumber(input(""))

say_title("Wpisz")

say("[ENTER]Liczbe numer 5 :[ENTER]")

local piec = tonumber(input(""))

say_title("Wpisz")

say("[ENTER]Liczbe numer 6 :[ENTER]")

local szesc = tonumber(input(""))

local jeeden = number(1, 36)

local dwaa = number(1, 36)

local trzyy = number(1, 36)

local czteryy = number(1, 36)

local pieec = number(1, 36)

local szescc = number(1, 36)

say_title("Kobita od Losowania :")

say("[ENTER]Twoje liczby granicza z wygrana:[ENTER]")

say_reward(jeden.." , "..dwa.." , "..trzy.." , "..cztery.." , "..piec.." , "..szesc.."")

say("[ENTER]Wylosowales kilka liczb w ktorych kryje sie nagroda :[ENTER]")

say_reward(jeeden.." , "..dwaa.." , "..trzyy.." , "..czteryy.." , "..pieec.." , "..szescc.."[ENTER]")

if jeden == jeeden then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if jeden == dwaa then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if jeden == trzyy then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if jeden == czteryy then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if jeden == pieec then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if jeden == szescc then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if dwa == jeeden then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if dwa == dwaa then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if dwa == trzyy then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if dwa == czteryy then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if dwa == pieec then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if dwa == szescc then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if trzy == jeeden then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if trzy == dwaa then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if trzy == trzyy then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if trzy == czteryy then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if trzy == pieec then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if trzy == szescc then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if cztery == jeeden then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if cztery == dwaa then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if cztery == trzyy then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if cztery == czteryy then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if cztery == pieec then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if cztery == szescc then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if piec == jeeden then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if piec == dwaa then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if piec == trzyy then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if piec == czteryy then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if piec == pieec then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if piec == szescc then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if szesc == jeeden then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if szesc == dwaa then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if szesc == trzyy then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if szesc == czteryy then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if szesc == pieec then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

if szesc == szescc then

pc.setqf("ilosc", pc.getqf("ilosc")+1)

end

wait()

say_title("Kobita od Losowania :")

local aaa = number(1000000, 20000000)

local bbb = number(50000000, 100000000)

local ccc = number(200000000, 500000000)

local ddd = number(1000000000, 1999999999)

if pc.getqf("ilosc")==0 then

say("[ENTER]Przegrałeś ;/ Wroc za 2h![ENTER]")

end

if pc.getqf("ilosc")==1 then

say("[ENTER]Byles ciut od wygranej.[ENTER]")

end

if pc.getqf("ilosc")==2 then

say("[ENTER]ach prawie wygrales[ENTER]")

end

if pc.getqf("ilosc")==3 then

say("[ENTER]trafiles ale to jeszcze nie to [ENTER]")

say_reward("Otrzymujesz "..aaa.." Yang.[ENTER]")

pc . change_money(aaa)

end

if pc.getqf("ilosc")==4 then

say("[ENTER]Coraz lepiej[ENTER]")

say_reward("Otrzymujesz "..bbb.." Yang.[ENTER]")

pc . change_money(bbb)

end

if pc.getqf("ilosc")==5 then

say("[ENTER]Juz prawie meta .[ENTER]")

say_reward("Otrzymujesz "..ccc.." Yang.[ENTER]")

pc . change_money(ccc)

end

if pc.getqf("ilosc")==6 then

say("[ENTER]Yupi wygrales konkurs twoj nick pojawi sie w tabeli [ENTER]")

say("Serdeczne Gratulacje.[ENTER]")

say_reward("Otrzymujesz "..ddd.." Yang.[ENTER]")

pc . change_money(ddd)

end

end

pc.setqf("ilosc", 0)

pc.setqf("tajm", get_time()+7200)

elseif 2==s then

say_title("Kobita od Losowania :")

say("[ENTER]To przyjdz tu jak bedziesz pewny że chczesz losować.[ENTER]")

end

elseif 2==s then

say_title("Kobita od Losowania :")

say("[ENTER]Nie to nie.[ENTER]")

end

else

say_title("Kobita od Losowania :")

say("[ENTER]Nie mineły jeszcze dwie godziny ![ENTER]")

end

end

end

end

 

 

 

 

 

 

Dodane na Wklej.to : 

http://wklej.to/Y3v5t

Usama Su kocken Legenda

Usama Su kocken

Opublikowano
Legenda

Usama Su kocken

Opublikowano

Jak coś

 

 

  quest lotek begin
state start begin
when 9003.chat."Losowanie Szczescia" begin
if get_time() >= pc.getqf("tajm") then
say_title("Witaj " .. pc . name .. "")
say("[ENTER]Czy chcesz zagrać z innymi w Losowanie Szczescia  ?[ENTER]")
local s=select("Tak", "Nie")
if s==1 then
say_title("Kobita od Losowania  :")
say("[ENTER]Aby zagrać w Bardzo duże losowanie o Tryliony ,[ENTER]trzeba wpłacić troszke [url=""][color=98C7C3 ][b][u]pieniedzy[/u][/b][/color][/url] .")
say("Losawanie będzie co dwie godziny.")
say("Musisz osiągnąć minimum 80 level .")
say("Aby cos wygrać trzeba wziaść udział .")
say("Wygrać można olbrzymią ilość Yang i jakies drobne [url=""][color=98C7C3 ][b][u]prezenty[/u][/b][/color][/url].")
say("[ENTER]Czy chczesz wziąć udział w losowaniu ?[ENTER]")
local s=select("Tak", "Boje sie ")
if s==1 then
if pc.money<2000000 then
say_title("Kobita od Losowania :")
say("[ENTER]Nie masz 20000000 Yang.[ENTER]")
else
pc.setqf("juz", 1)
pc.changemoney(-2000000)
say_title("Kobita od Losowania :")
say("[ENTER]A więc tak ,[ENTER]Kliknij na mnie a bedziesz bral udzial.[ENTER]")
wait()
say_title("Wpisz")
say("[ENTER]Liczbe numer 1 :[ENTER]")
local jeden = tonumber(input(""))
say_title("Wpisz")
say("[ENTER]Liczbe numer 2 :[ENTER]")
local dwa = tonumber(input(""))
say_title("Wpisz")
say("[ENTER]Liczbe numer 3 :[ENTER]")
local trzy = tonumber(input(""))
say_title("Wpisz")
say("[ENTER]Liczbe numer 4 :[ENTER]")
local cztery = tonumber(input(""))
say_title("Wpisz")
say("[ENTER]Liczbe numer 5 :[ENTER]")
local piec = tonumber(input(""))
say_title("Wpisz")
say("[ENTER]Liczbe numer 6 :[ENTER]")
local szesc = tonumber(input(""))
local jeeden = number(1, 36)
local dwaa = number(1, 36)
local trzyy = number(1, 36)
local czteryy = number(1, 36)
local pieec = number(1, 36)
local szescc = number(1, 36)
say_title("Kobita od Losowania :")
say("[ENTER]Twoje liczby granicza z wygrana:[ENTER]")
say_reward(jeden.." , "..dwa.." , "..trzy.." , "..cztery.." , "..piec.." , "..szesc.."")
say("[ENTER]Wylosowales kilka liczb w ktorych kryje sie nagroda :[ENTER]")
say_reward(jeeden.." , "..dwaa.." , "..trzyy.." , "..czteryy.." , "..pieec.." , "..szescc.."[ENTER]")
if jeden == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if jeden == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if jeden == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if jeden == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if jeden == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if jeden == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
wait()
say_title("Kobita od Losowania :")
local aaa = number(1000000, 20000000)
local bbb = number(50000000, 100000000)
local ccc = number(200000000, 500000000)
local ddd = number(1000000000, 1999999999)
if pc.getqf("ilosc")==0 then
say("[ENTER]Przegrałeś ;/ Wroc za 2h![ENTER]")
end
if pc.getqf("ilosc")==1 then
say("[ENTER]Byles ciut od wygranej.[ENTER]")
end
if pc.getqf("ilosc")==2 then
say("[ENTER]ach prawie wygrales[ENTER]")
end
if pc.getqf("ilosc")==3 then
say("[ENTER]trafiles ale to jeszcze nie to [ENTER]")
say_reward("Otrzymujesz "..aaa.." Yang.[ENTER]")
pc . change_money(aaa)
end
if pc.getqf("ilosc")==4 then
say("[ENTER]Coraz lepiej[ENTER]")
say_reward("Otrzymujesz "..bbb.." Yang.[ENTER]")
pc . change_money(bbb)
end
if pc.getqf("ilosc")==5 then
say("[ENTER]Juz prawie meta .[ENTER]")
say_reward("Otrzymujesz "..ccc.." Yang.[ENTER]")
pc . change_money(ccc)
end
if pc.getqf("ilosc")==6 then
say("[ENTER]Yupi wygrales [url=""][color=98C7C3 ][b][u]konkurs[/u][/b][/color][/url] twoj nick pojawi sie w tabeli [ENTER]")
say("Serdeczne Gratulacje.[ENTER]")
say_reward("Otrzymujesz "..ddd.." Yang.[ENTER]")
pc . change_money(ddd)
end
end
pc.setqf("ilosc", 0)
pc.setqf("tajm", get_time()+7200)
elseif 2==s then
say_title("Kobita od Losowania :")
say("[ENTER]To przyjdz tu jak bedziesz pewny że chczesz losować.[ENTER]")
end
elseif 2==s then
say_title("Kobita od Losowania  :")
say("[ENTER]Nie to nie.[ENTER]")
end
else
say_title("Kobita od Losowania  :")
say("[ENTER]Nie mineły jeszcze dwie godziny ![ENTER]")
end
end
end
end

 

 

 

Do tego dodaj na wklej.to aby były tabulatory :)

Sunushi Bywalec

Sunushi

Opublikowano
Bywalec

Sunushi

Opublikowano

Do tego dodaj na wklej.to aby były tabulatory :)

Kwestia jest taka czy ktoś w ogóle ich używa.

 

A teraz pokażę wam magię!

To:

if jeden == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if jeden == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if jeden == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if jeden == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if jeden == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if jeden == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end

 

a to:

numerki = {
{"jeden", "jeeden"},
{"dwa", "dwaa"},
{"trzy", "trzyy"},
{"cztery", "czteryy"},
{"piec", "pieec"},
{"szesc", "szescc"},
}
for i=1,6 do
for j=1,6 do
if numerki[i][1] == numerki[j][2] then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
end
end

 

robią to samo (i nie do końca moja wersja działa ;)). Peace.

Koniec z MPCForum.pl i ogółem z metinem

:D

 

sunp.png

Sygnatura wykonana przez

Isuribi aka Amelka.

z4z0l Bywalec

z4z0l

Opublikowano
Bywalec

z4z0l

Opublikowano

Szkoda że wartości inputów mogą wynosić zero, nie muszą być wcale wypełniane itd.

 

umarł

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

Tematy
×
×
  • Dodaj nową pozycję...